function [ bestsc, minsc, maxsc ] = estimsc_mst(P)
%ESTIMSC_MST     odhad spread constant pomoci minimalni kostry

ed = euclidDist(P);
mst = minspanningtree(ed);
c = mst(:,3);
% global estimsc_const_a;
% global estimsc_const_b;
%a = log(log(estimsc_const_a+estimsc_const_b*length(c)^3));
a = 0.8;
bestsc = a*(mean(c .^ 3))^(1/3);
minsc = 0.8*a*mean(c);
maxsc = 1.2*a*max(c);
end

